Imports Microsoft.VisualBasic

Public Class Cliente
    Private _rut As String
    Private _rznSocial As String
    Private _direccion As String
    Private _giro As String
    Private _telefono As String
    Private _comuna As String
    Private _region As String
    Private _contacto As String
    Private _ciudad As String
    Private _fax As String
    Private _email As String
    Private _id As String


    Public Sub New(ByVal rut As String, ByVal rznSocial As String, ByVal direccion As String, _
                    ByVal giro As String, ByVal telefono As String, ByVal comuna As String, _
                    ByVal region As String, ByVal contacto As String, ByVal ciudad As String, _
                    ByVal fax As String, ByVal email As String, ByVal id As String)

        Me._id = id
        Me._rut = rut
        Me._rznSocial = rznSocial
        Me._direccion = direccion
        Me._giro = giro
        Me._telefono = telefono
        Me._comuna = comuna
        Me._region = region
        Me._contacto = contacto
        Me._ciudad = ciudad
        Me._fax = fax
        Me._email = email

    End Sub

    Public Property ID() As String
        Get
            Return _id
        End Get

        Set(ByVal value As String)
            _id = value
        End Set
    End Property

    Public Property Region() As String
        Get
            Return _region
        End Get

        Set(ByVal value As String)
            _region = value
        End Set
    End Property

    Public Property Contacto() As String
        Get
            Return _contacto
        End Get

        Set(ByVal value As String)
            _contacto = value
        End Set
    End Property

    Public Property Ciudad() As String
        Get
            Return _ciudad
        End Get

        Set(ByVal value As String)
            _ciudad = value
        End Set
    End Property

    Public Property Fax() As String
        Get
            Return _fax
        End Get

        Set(ByVal value As String)
            _fax = value
        End Set
    End Property

    Public Property Email() As String
        Get
            Return _email
        End Get

        Set(ByVal value As String)
            _email = value
        End Set
    End Property

    Public Property Rut() As String
        Get
            Return _rut
        End Get

        Set(ByVal value As String)
            _rut = value
        End Set
    End Property

    Public Property RznSocial() As String
        Get
            Return _rznSocial
        End Get

        Set(ByVal value As String)
            _rznSocial = value
        End Set
    End Property

    Public Property Direccion() As String
        Get
            Return _direccion
        End Get

        Set(ByVal value As String)
            _direccion = value
        End Set
    End Property

    Public Property Giro() As String
        Get
            Return _giro
        End Get

        Set(ByVal value As String)
            _giro = value
        End Set
    End Property

    Public Property Telefono() As String
        Get
            Return _telefono
        End Get

        Set(ByVal value As String)
            _telefono = value
        End Set
    End Property

    Public Property Comuna() As String
        Get
            Return _comuna
        End Get

        Set(ByVal value As String)
            _comuna = value
        End Set
    End Property

End Class
